| = | 
} | 
| 

LLL HI11111 NNN NNN KKK KKK EEEEEEEEEEEEEEE RRRRRRRRRRRR 

LLL III NNN NNN KKK KKK EEEEEEEEEEEEEEE RRRRRRRRRRRR 

LLL HI NNN NNN KKK KKK EEEEEEEEEEEEEEE RRRRRRRRRRRR 

LLL II] NNN NNN KKK KKK EEE RER RRR 

LLL 11] NNN NNN KKK KKK EEE RRR RRR 

LLL II] NNN NNN KKK KKK EEE RRR RRR 

LLL 11] NNNNNN NNN KKK KKK EEE RRR ARR 

LLL 11] NNNNNN NNN KKK KKK EEE RRR RRR 

LLL II] NNNNNN NNN KKK KKK EEE RRR RRR 

LLL II] NNN NNN NNN KKKKKKKKK EEEEEEEEEEEE RRRRRRRRRRRR 

LLL II] NNN NNN NNN KKKKKKKKK EEEEEEEEEEEE RRRRRRRRRRRR 

LLL II] NNN NNN KKKKKKKKK EEEEEEEEEEEE RRRRRRRRRRRR 

LLL II] NNN NNNNNN KKK KKK EEE RRR RRR 

LLL II] NNN NNNNNN KKK KKK EEE RRR RRR 

LLL 11] NNN NNNNNN KKK KKK EEE RRR RRR 

LLL 11] NNN NNN KKK KKK EEE ARP RR 

LLL II] NNN NNN KKK KKK EEE RRR RRR 

LLL 11] NNN NNN KKK KKK EEE _ RRR RRR 

LLLLLLLLLLLLLLL IIIIIIII1 NNN NNN KKK KKK EEEEEEEEEEEEEEE RRR RRR 

LLELLLLLLLLLLLLL III NNN NNN KKK KKK EEEEEEEEEEEEEEE RRR RRR 

LLELLLLLLLLLLLLL III NNN NNN KKK KKK EEEEEEEEEEEEEEE RRR RRR 
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**FILE**1D**LINKER 
LL III] NN NN KK KK EEEEEEEEEE RRRRRRRR 
LL III] NN NN KK KK EEEEEEEEEE RRRRRRRR 
LL I] NN NN KK KK EE RR RR 
LL I] NN NN KK KK EE RR RR 
LL I] NNNN NN KK KK EE RR RR 
LL II NNNN NN KK K EE RR RR 
LL Il NN NN NN KKKKKK EEEEEEEE RRRRRRRR 
LL I] NN NN NN KKKKKK EEEEEEEE RRRRRRRR 
LL I] NN NNNN KK K EE RR RR 
LL II NN NNNN KK KK EE RR RR 
LL I] NN KK KK EE RR RR eees 
LL II NN NN KK KK EE RR RR eees 
LLLLLLLLLL T1111 NN NN KK KK EEEEEEEEEE RR RR ceee 
LLLLLLLLLL 1111 NN NN KK KK EEEEEEEEEE RR RR : 
LL III] SSSSSSSS$ 
LL III] SSSSSSSS 
LL I] $$ 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SSSSSS 
LL I] SSSSSS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SS 
LLLLLLLLLL III1I] SSSSSSSS 
LLLLELLLLL HII SSSSSSSS 
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1§- -Sep-1984 9 08:67 AX-11 Oi lear te V4.0-74 Page 
14-Sep-1984 12:40:27 LINKER. SRCJLINKER.B32; 
a 0001 © MODULE LNK_MAIN 
; ¢ ote (IDENT = 'v04-000' 
: 0 »MAIN = LNKSSTART 
3 4 004 “ADDRESS ING 4 s4 a 
: 5 0005 (EXTERN = GENERAL 
3 $ Boe 0 AONE RTERNAL = LONG_RELATIVE 
; 000 0 ) Ss 
: 8 0008 
; .] 0009 1 BEGIN 
PSS. . 0010 1! 
+ ae 0011 1! 
: \§ Bog ! [eee agen Pong eer 
3 1 ‘®t t 
: «614 0014 1 !* COPYRIGHT (c) 1978, 1980, 1982, 1984 e 
; 15 0015 1 !* DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. « 
3 18 Baig ; he ALL RIGHTS RESERVED. & 
4 ‘® * 
4 18 0018 1 ‘* THIS fe arche ss FURNISHED UNDER A LICENSE AND MAY BE USED AND og be * 
oo ve 0019 1 !* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * 
; 20 0020 1 !* INCLUSION OF THe ABOVE oe cakeraee NOTIC et THIS SOFT WARE OR ANY OTHER * 
4 21 0021 1 !* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
Ps $§ BoS§ 1 !* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
3 $i OOSi : :* TRANSFERRED. * 
2 ‘@ ® 
3 25 iH 1 !@ THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
; 26 0026 1 !* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
3 sf aig de ; :* CORPORATION. . 
H ‘® ® 
3 9 0029 1 !* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * 
; ’ 4 , : :* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * 
: '@ * 
ri 2 0032 1 !* . 
M4 3 003 1 See eRe eR REAR AAAAAAAAAAAAAAAAAAAE AAA EA ATAAAAAATAAAAARAAAAAAAAAARARAAEREE 
; 34 ite m-§ 
3 35 — 2% 
; 0036 1! 
a 0037 1! 
er 0038 7! 
ee 0039 1 !¢4+ 
s 440 00460 1: 
: 41 0041 1 ! MODULE: LNK_MAIN of 
zo. R266 1! \ 
3 4 204 1 ! FACILITY: LINKER : 
: 44 Boe + 
3 ri Bee : ABSTRACT: THIS IS THE MAINLINE CONTROL ROUTINE WHICH CALLS EVERYTHING ELSE 
3 47 vad 1 ! HISTORY: 
: 48 0U48 1! 
: 69 0049 1! VERSION: x01.00 
; $9 050 1! 
: 51 051i 1! AUTHOR: T.J. PORTER 03-JAN-77 
5 26 B36 1! 
; 37 pez : MODIFIED BY: 
ro oe 055 1! v03-020 ADE0001 : Alan D. Eldridge 08-Aug-1982 
$ 28 ope : } Increment Linker version to ‘'04-00' 
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LINKER. SRCJLINKER.B32;1 
; 8 058 1! V03-019 JwT0074 Jim 09-Dec-1982 
3 9 889 1 Increment Linker mo Bh a for Debugger image header 
: rt bet : changes. 
,§ 0062 1 | VO3=018 JWwT0044 Jim Teague 30-Jul-198 
: o7 aos ! Open file performance Seost. ¥ ’ 
: 65 065 1: V03-017 JuT0040 Jim Teague S-Jun-19 
: ¢ 3 O0ee : } Version number to 3A. o ee 
: 68 0068 1 | v03-016 BLS0170 Benn Schreiber 15-Apr-1982 
‘ 8 34 ! } Correct handling of Library errors . 
; 0071 1: v03-015 BLS0159 Benn Schreiber 17-Mar-1982 
; f Bo3 : Set inhib_msg when exiting. 
; 7 0074 1: v03-014 BLSO111 Benn Schreiber 22-Nov-1981 
; fe Bote : Complete shareable image psect handling/migration 
TB 0077 1: v03-013 BLS0101 Benn Schreiber 7=Nov-1981 
: % Bere : } Multiple modifications...see other modules. 
: 80 0080 1 v03-012 BLS0090 Benn Schreiber 26-0ct-1981 
: Bs sd | Module-local symbols 
: 8 0083 1! ¥03-011 BLS0078 Benn Schreibe 8-Sep-1981 
: HE Boge : Several minor fixes. itv = 
: 86 0086 1} v03-010 BLS0074 Benn Schreiber 29-Aug-1981 
; +44 4 $4 : } More work on based shareable images 
; 89 0089 1 | v03-009 BLS0072 Benn Schreiber 25-Aug-1981 
: + Beas : } Enhance based image capabilities 
; 92 0092 1: V03-008 BLS0069 Benn Schreiber 15-Aug-1981 
; 4 iad : Rework pass 2. Fix miscellaneous bugs 
3 95 0095 v03-007 (lost) 
: 97 0097 1: V03-006 BLS0049 Benn Schreiber 22-Mar-1981 
: 4 994 ! Allow positioning of pic shareable images in cluster= option 
: 100 0100 1: V03-005 BLS0046 Benn Schreiber 14-Mar-1981 
s 101 B13! 1! Random collection of bug fixes. Issue info message if 
: 108 3 . 2 creating PIC shareable image and non-pic data or non-pic 
: 132 Binz : } shareable image input. 
: 105 0105 1 i 03-004 BLS0040 Benn Schreiber 12-Feb-1981 
: 198 bine : Force psects in collect= option to be global. 
: 108 0108 1: v03-003 BLS0035 Benn Schreiber 19-Jan-1981 
: 1% 13 ! e5k psects 
+ 111 He 1 i v03-002 BLS$0029 Benn Schreiber 21-Dec-1980 
: ig b148 : } Library of shareable images. 
: 114 0114 1! v03-001 BLS0007 Benn Schreiber, 3-Jun-1980 


y$-ep-1964 09:04:27 yAnct1 BLisg-42_ 4.02742 Page, 


Convert data structures to MOL. 


LNK_MAIN 
vOu=000 
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ia=000 eR aets ak CH a ae te Pe te o9¢ 12) 


++ 


' 
i 
FUNCTIONAL DESCRIPTION: 

i 

! THIS MODULE CONTAINS THE MAINLINE AND THE TERMINATION ROUTINE 
OF THE LINKER. 

i 


LIBRARY 

*LIBL32'; ! SYSTEM SERVICES MACROS 
REQUIRE 

"PREF IX'; ! VARIABLES, MACROS ETC. 
LIBRARY 
*DATBAS'; ! INTERNAL DATA BASE 
FORWARD ROUTINE 

LNKSEXIT : NOVALUE; ! TERMINATION ROUTINE 


EXTERNAL ROUTINE 


WN 9 OONOAU EWN" O OONOA NEW OOD ONAUE WN" OVOONOULSWN OOO 
AOE AWN @§ © OO NAUES WN (OOO SPUN E WN O ODODNIN S(O CONOUES WN "O0O~ 


LNKSCLOSEFILE ; NOVALUE, ' CLOSE THE CURRENT OBJ FILE 

NKSCLOSMAPF IL, i CLOSE THE MAP FILE 

LNKSCLOSIMGFIL, i CLOSE THE IMAGE FILE 

LNKS$CLOSYMOUT, i CLOSE SYMBOL TABLE OUTPUT 

LNKSIMGINIT, i INITIALIZATION OF IMAGE IN MEMORY 

LNKSINIT, i INITIALIZATION ROUTINE 

LNKSFLUSHIMG, i WRITE AND COMPRESS THE IMAGE FILE 

LNKS$HANDLER, i ERROR HANDLER 

LNKSGETCMD i GET COMMAND PARAMETERS 

LNKSMAPINIT, i INITILIZE THE MAP OUTPUT 

LNKSMAPADROMD, i MAP OBJ MODULES WITH .ADDRESS 

LNKSMAPISCTS, i MAP IMAGE SECTIONS 

LNKSMAPPSCTS. i MAP THE P=SECTI 

LNKSMAPSTATS, i OUTPUT THE STATISTICS 

LNKSMAPSY i MAP THE SYMBOL TABLE 

LNKSOBJPASS{, i OBJECT MODULE PASS 1 

LNKSOBJPASS2 i AND PA 

LNKS$SYMTBLOUT, i OUTPUT SYMBOL TABLES 

LNKSVMALLO, i VIRTUAL MEMORY ALLOCATION AND RELOCATION 
LNKSWRT IMGHDR: i WRITE THE IMAGE HEADER BLOCK(S) 
EXTERNAL 


LNKSGL_CURFIL, FOR CLOSING LAST FILE... 
LNK A 


0009 09 SINS NS NSN NNN AAA AAA AAR Sr WAIT & BAIN Ponunownuns 


fe] ~ ~ ~ we —_ 


“WARNI SUE 
LINS~ERRORI SUE; ERRORS ISSUED 


GLOBAL 


ee hc em ee a ed a ed ed = = = 8 3 wd I as = a = = “sd I 2 


Pe an ee Re ty et tet et ae BREE EE PWM wnopoponsporonononn 
DOCOOOCOCCOCOCSCOC COC GOOCOCCOCOCOCOOCOOOOO COCO OCOO OOO OCOOCO OOOO OOO OOOOOOoOOoO Oo 


POPPEPSPOPIPGPDPIRIPSPUPOPINIPINPYIPINININPININININININININPINIPININININININIPININID 2 9 9 Ot 
a ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee eS 


' 
7 “PASS : BYTE, i PAS 
R LNKSGB-MAXERCOD : BYTE i RECORDED ERROR CODE 
66 ; LNKSGL-CTLMSK  : BBLOCK; i CONTROL MASK 

8 1 1 EXTERNAL LITERAL 
9 2 LINS_FATALERROR, ! FATAL ERROR MESSAGE ISSUED. 
: ; LINS"WARNIS i WARNING MESSAGES ISSUED 
: 5 


Go000D 00 


LNKSAW_VERSION : BLOCK CLIDSC_SIZE, BYTE) ! LINKER VERSION ARRAY 
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LNK_MAIN 18-96 -1984 00:04:27 AX-11 Bliss-32 v4.0-742 Page 
iOa=000 127808- 1382 90:05:55 LINKER. SRCJLINKER.B32;1 
175 INITIAL (WORD (ZASCII 194") ' CURRENT VERSION 
g so (ZASCII '00") | AND ALTERATION NUMBER 
7 ' i 
4 i STARTING REAL TIMES: 
8 : LNK$GQ_STARTIM : VECTOR , ' START TIME 
8 LNK$GQ-PS1STIM : VECTOR ‘ i PASS 1 START TIME 
a LNK$GQ-ALOSTIM : VECTOR s i ALLOCATION PHASE START TIME 
LNK$GQ"PS2STIM : VECTOR ; i PASS 2 START TIME 
2 LNK$GQ"MAPSTIM : VECTOR [2]. i REMAINDER OF MAP BEGINS 
¢ LNK$GQ"STBSTIM : VECTOR (C2). i SYMBOL TABLE OUTPUT BEGINS 


CPU TIMES: 


LNKS$GL_CPUSTIM, 
LNK$GL_PS1CPUT, 
LNK$GL_ALOCPUT, 


LNK$GL_PS2CPUT, 


¢ 
LNK$GL~STBCPUT. 
LNK$GL-ENDCPUT, 


PAGE FAULT COUNTS: 


LNKSGL_SPAGFLTS, 
LNKSGL~PS1FLTS, 


CPU TIME AT_THE START OF LINK 
PASS 1 CPU TIME (AT THE START) 
ALLOCATION PHASE CPU TIME 

PASS 2 CPU TIME 

MAP OUTPUT CPU TIME 

SYMBOL TABLE OUTPUT CPU TIME 
END CPU TIME 


LISSSSSSSF 
DOOCOOOCOCOCSOOCOOOO0O0O0OOOMC 


PAGE FAULT COUNT AT START OF LINK 
PAGE FAULT COUNT AT START OF PASS 1 


CGOOCOCOCOCSCOSOOCOCOCOCOCOCOOOOOO OOOO OOOOOOO 


WNWWIAANAANWANAW WANA 
DWONAUVSWN (OO ONAUES WNC OONAUES WN —OO0M 


aa ak tk a tt dt ot ot ot ot = = = = 2 a So = 2 


EN ae ee ee 
ooooo ~o co 


bn bb td a 4) 


DURING ALLOCATION/RELOCATION 
PASS 2 PAGE FAULTS 

MAP OUTPUT PAGE FAULTS 

SYMBOL TABLE OUTPUT PAGE FAULT COUNT 
END PAGE FAULTS 


H 16 
LNK_MAIN 16-Sep-1984 00:04 
142000 18-808-1382 99:95 
GLOBAL ROUTINE LNKSSTART (ARGLIST) : NOVALUE = 


THIS IS THE MAIN ROUTINE OF THE LINKER, ITS PURPOSE 
BEING MERELY TO CALL THE ROUTINES THAT DO 
ALL THE WORK AND TO MONITOR THE PERFORMANCE OF EACH. 

G T PROVIDED ON ACTIVATION 
SET CLISA_UTILSERV) 
UIRED FOR OBTAINING 


:27 AX-11 Bliss-32 V4.0-74 Pp 
‘gf LINKER. SRCJLINKER.B32; a (38 


r—w 


or 
QOonr- 


BEGIN 
OWN 


ocm 
2 
=~ 
cr 
—w 
noc 
=—n 
~n 
m 
> +) 


LONGWORD OF CPU TIME 
LONGWORD OF PAGE FAULTS 
END OF ITEM DESCRIPTOR LIST 


DWONAOVULS ARO OONAOUES WO 
es 


Mrororofrororofofrorfrorfropoforong 
MMNMNMNNINININ 2 2 3 2 OO Oe OO 
DNAS WN (OVD ONOULS WIN O00 


ENABLE LNKSHANDLER; ! ENABLE CONDITION HANDLER 


SGETTIM (TIMADR = LNK$GQ_STARTIM); ! GET START VALUES 
SGETJPI (ITMLST = DATALIST); 

LNKSGL_CPUSTIM .CURCPUTIM; 

LNKSGL~SPAGFLTS = .CURPAGEFLTS: 

LNKSINIT (); 


(); PERFORM INITIALIZATION 
LNKSGETCMD (ARGLIST=4); GO_ GET THE COMMAND PARAMETERS 
WITH NO RETURN IF IN ERROR 
LNKSGB_PASS = 1; SET PASS NUMBER 


1 
1 
1 
1 
1 
1 
1 
1 
1 
| SGETTIM (TIMADR par Pest im); ! GET START VALUES FOR PASS 1 


LNKS$GL_PS1CPUT : 
LNKS$GL"PSIFLTS = 
LNKSOBJPASS1 (AR 


SGETTIM (TIMADR 


ounnn 
re 

—e « 
NOo>PY 
—cc 

‘ P=) 
Uo 
->vU 

Se _ 


! EXECUTE PASS1 | 
GET THE START VALUES OF ALLOCATION/RELOCATION PHAS | 


LNK$GQ_ALOSTIM); 
DATALIST); 


.CURCPUTIM; 
. CURPAGEFLTS; 


at et pt et et ee 
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' ALLOCATE VIRTUAL MEMORY 
IF .LNKSGL_CTLMSK CLNKS$V_IMAGE) IF AN IMAGE IS REQUIRED 
THEN LNKSIAGINIT (); GO GET IT STARTED 

F_ .LNKSGL_CTLMSK CLNKS$V_MAP) IF A MAP IS REQUIRED 
THEN LNKSMAPINIT (); ' START THE MAP 


LNKSGB_PASS = 2; 


SGETTIM (TIMADR = LNK$GQ_PS2STIM); 
$GETJPI sgcPUr = DATALIST); 
= 


SET PASS 2 
GET START VALUES FOR PASS 2 


SOONAUE WIN — © OONOUE WN $O OONOUFWWIN-2-O 


. CURCPUTIA; 
FLTS -CURPAGEFLTS; 


LNKSOBJPASS2 (); 


GahO 2 O00 GOA Pint WOOO NONE WN ODS SURI 


SAN NNO 


EXECUTE PASS 2 
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15-Sep-1984 


14- ~Sep- 


IF .LNKSGL_CTLMSK CLNKSV_IMAGE) 
THEN LNKSFCUSHIMG (); 


SGETTIM (TIMADR = LNKSGQ_MAPSTIM); 


SGETJPI CLTMLST = DATALIST); 

LNKSGL farcry = CUREP PUTIM; 

LNKSGL “MA CURPAGEFLTS; 
CLNKSV_MAPOPN) 


iP CUNRSGL Tomsk 
LNKSMAPADROMD (); 


SGETTIM (TIMADR = LNKS$GQ STBSTIM); 
SGETJPI (ITMLST = DATALIST) 

TBCPUT = 
= 


URE PUT IA: 
tNKSeL~ STBFLTS  CURPAGEFLTS; 
LNKSSYATBLOUT (); 


IF .UNKSGL_CTLMSK CLNKS$V_IMAGE] 
THEN LNKSWRTIMGHDR (); 


SGETJPI (ITMLST = DATALIST); 
LNKSGL_ENDCPUT = .CURCPUTIM 
LNKSGL-ENDFLTS = " CURPAGEFLTS: 


IF .LNKSGL_CTLMSK CLNKSV_MAPOPN] 
THEN BEGIN™ 
LNKSMAPSTATS (); 
ae 0; 


LNKSEXIT NELsé Thee ay THEN SS$_NORMAL 


NK$GB_MAXFRCOD EQC STS$K_WARNING 


THEN LINS_WARNISUE 
ELSE LINS_ERRORI SUE 


00000 CURCPUTIM: 
00004 CURPAGEFLTS: 
0004 00008 DATALIST: 


407 QOQO0A 

6008 " 000 
000 001 
4 00014 


spi AX-11 B -32 
: LINKERS Re LINK 


-WORD 
ADDRESS CURCPUTIM 
“hone 


= 

=r 
v 
o 
2a 
ti 


IF IMAGE PRODUCTION ST 
COMPRESS AND WRITE THE 


START VALUES FOR BULK 0 


IF THE MAP IS STILL OPEN 
OUTPUT MODULES WITH .ADDRESS 
UTPUT_ IMAGE SECTION oeoeala 


RINT THE P-SECTION SYNOPSI 
OUTPUT THE SYMBOL TABLE 


GET START VALUES FOR STB OUTPUT 


OUTPUT THE SYMBOL TABLE 


IF THE IMAGE IS STILL OPEN 
OUTPUT THE HEADER AND CLOSE IT 


IF THE MAP IS STILL OPEN 


THEN STATISTICS OF THIS RUN 
FINALLY CLOSE THE MAP FILE 


LNK MAIN 
\V0%-000\ 


SOWNS ,NOEXE ,2 
4 
4 
4 
1 


031 


0 
4 
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LNK_MAIN 16 $ep-1984 00:04:27 AX-11 BLi ~% 
142000 eat Rt Ce et td IR ee tte bet 
4OA 1 1034 ; 
SoH aah “ADDRESS CURPAGEFLTS : 
30 0 026 “LONG ; 


.PSECT $GLOBAL$,NOEXE,2 
34 30 00000 LNKSAW_VERSION:: 
“ASCII 
30 30 00002 
00004 


oo 
of 
a“ 
>. 


»ASCII 
LNK$GQ_STARTIM:: 
:BLKB 
0000C LNK$GQ_PS1STIM:: 
00014 LNKSGQ_ALOSTIN:: 
0001¢ LxsGa_P&2stiM:: 
00024 LNK$GQ_MAPSTIM:: 
-BLKB 
0002C LNK$GQ_STBSTIM: : 
-BLKB 
00034 LNKSGL_CPUSTIM:: 
-BLKB 
00038 LNKSGL_PS1CPUT: : 
-BLKB 
0003¢ LNKSGL_ALOCPUT:: 
00040 LNKSGL_PSSCPUT:: 
00044 LNKSGL_MAPCPUT: : 
00048 LNKSGL_STBCPUT: : 
0004C LNKSGL_ENDCPUT: : 
00050 LNKSGL_SPAGFLTS: 
00054 LNKSGL_PSTFLTS:: 
00058 LNKSGL_ALOFLTS:: 
0005C LNKSGL_PS FLISz: 
00060 LNKSGL_MAPFLTS:: 
00064 LNKSGL_STBFLTS#: 
00068 LNKSGL_ENDFLTS:: 
-BLKB 


RP RRR RB Re 8 8 8 Bn @ @ © wo wo we 


LE, LNKSCLOSMAPF IL 
FIL, LNKSCLOSYMOUT 
IT, LNK IN NIT 

NKSF 1nG, LNKSHANDLER 
“EXTRN LNKSGETCMD SMAPINI 
SEXTRN LNKSMA SRAPADROMD” LNKSMAPISCTS 


64 


00 


So 
o 
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INKER.SRCILINKER, B32; 
LNKS$MAPPSCTS, LLNKSHABSTATS 
LNKSMAPSYMS, LNKSOBJPASS1 
LNKSOBJPASS2, LINK Se YMT BOUT 
L NK SRT INGHDR 
LNK$GL CURF IL spt NK$GB_PASS 
LNK$GL~CTLMSK, LINS. FATALERROR 
LIN$_WARNISUE, LIN$~ERRORISUE 
SYSSGETTIM, SYSS$GETIPI 


SCODES ,NOWRT,2 


LNKSSTART, Save R2,R3,R4,R5,R6,R7 


S$GETUP 
bueeso, START, R3 


DATALIST 
11$, (FPS 

#1, SYSSGETTIM 
-(§P) 
-(SP) 

R2 

=(SP) 

-(SP) 

#7, SYSSGETUPI 

CURCPUTIM UNKSGL CPUSTIM 


CURPAGEFLTS, LNKSGL_SPAGFLTS 
#0. LNKSINIT 


#1, LNKSGETCMD 
#1, LNK$GB_PASS 
LNKSGa palate 
1g sVSSGETTI M 


SYS$GETJPI 
Cuacbutig LNK$GL_PS1CPUT 
CURPAGEFLTS, LNKSGL_PSIFLTS 


#1, LNKSOBJPASS1 
LNkSGa ALOSTIM 
#1, SYSSeETTI IM 


-(SP) 
R2 
-(SP) 
(SP) 
#7, SYSSGE 
tuRCEUTIRG sunKSGL ALO CPUT 


CURPAGERLTS. LNKSGL_ALOFLTS 
#0, LNKSVMALLO 


Page 


9 
(3) 


0320 
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LNK_MAIN 16-Se 7 AX-11 Bliss-32 V4.0-74 
i ha=000 aaa 1 99: 93: $5 LINKER. SRCILINKER.B32: 
7 ES OOOAA BLBC = LNKSGL_CTLMSK, 1$ 
000000006 8 § Fe AD CALLS 40, Chesine INIT 
07 : 4 € B4 1$: BBC 4, ott te tM ASK. 2$ 
000000006 FB B88 CALLS i: tNK KS$MAPINIT 
6 9 OBF 2$: MOVB #2, LNK$GB_PASS 
18 AS OF 000C PUSHAB LNK$GQ_PS2STIM 
65 Qi FB oC CALLS #1, SYSSGETTIM 
. ve 0 C CLRO 20s = (§P) 
a3 D4 OCA CLRL = = (SP) 
5 DD 00CC PUSHL R2 
E 7C 000C CLRQ.  =(SP) 
43 D4 990 CLRL = = (SP) 
64 0 FB D CALLS 4&7, SYSS$GETUPI 
3c OAD F8 Ag DO 000D MOVL CuRCBUTIAG VE seL PS2CPUT 
58 OAS FC A2 DO OOODA MOVL CURPAGEEL LTS, LNKSGL_PS2FLTS 
000000006 00 00 FB SO0DF CALLS #0, SOBJPASS 
07 66 £9 O00E6 BLBC —s LINK KSEL wait $ 
000000006 00 00 FB OO0ES CALLS #0, CNRSELU SHIMG 
20 AS 9F OOOFO 3S: PUSHAB LNKSGa MAPSTIM 
65 01 FB OO0F3 CALLS SYSSGETTIM 
7E 7C 000F6 CLRO fl Eps 
7E 04 000F8 CLRL = = (SP) 
52 DD OOOFA PUSHL R2 
7E 7C OO0FC CLRQ.  =(SP) 
7E 04 OOOFE CLRL = = (SP) 
64 07 FB 90190 CALLS #7, SYSS$GETUPI 
40 A3 F8 Ag DO 0010 MOVL CURCPUT IM LNKS$GL_MAPCPUT 
SC AS FC A2 DO 00108 MOVL A taeast , LNKSGL_MAPFLTS 
1C 66 05 €1 00100 BBC LNK$G LMSK, 4$ 
00006 00 00 FB 00111 CALLS LNK$MA ADR 0 
000000006 00 00 FB 00118 CALLS 5. LNKSMAPISCTS 
000000006 00 00 FB OO11F CALLS #0, LNKSMAPPSCTS 
000000006 00 00 FB 00126 CALLS #0. LNKSMAPSYMS 
28 AS 9F 00120 4$: PUSHAB LNKSGQ STBSTIM 
65 01 FB 00130 CALLS SYSSGETTIM 
7E 7C 00133 CLRO = Wl ep} 
3 D4 00135 CLRL ~(35) 
52 0D 01 7 PUSHL R 
7E 7¢ 00139 CLROQ = (SP) 
7E 04 01 CLRL. 
64 07 FB 0013D CALLS JPI 
OCA FB OA D0 00140 OVL HP SYSSGe Ve eseL STBCPUT 
60 A FC Ad 00 00145 MOVL CURPAGEELS LNKSGL _STBFLTS 
000000006 00 0 FB O16A CALLS fBL 
66 €E 131 LBC LNKSGL CTLMSK 
000000006 00 00 FB 00154 CALLS cL CTLRSK 38 
7E 7C 0198 S$: CLRO Meet 
43 D4 0015p CLRL = = (SP) 
5 bp 15F PUSHL  R2 
7E 7C 00161 CLRQ. = = (SP) 
43 D4 163 CLRL 48?) 
64 07 FB 0016 CALLS 
48 «AB F8 A2 DO 00168 OVL eracbUrin’ my ENDCPUT 
64 AB a 3 D0 160 MOVL Sa RPAGEELTS LNK &L ggnDFLTs 
1 66 E1 001 BBC 
000000006 00 0 FB 00176 CALLS #0. ott at 
000000006 00 0 FB 0017D CALLS #0. LNKSRAPSTATS 
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M 16 
LNK_MAIN 16-Sep-1984 4:27 AX-11 Bliss-32 V4.0-74 
v04=000 14- Sep- 1984 99: 28: 5 LINKER.SRC LINKER RB30r4 
50 000000006 6 9A 00184 6$: MOVZBL LAKSG8 MAXERCOD. RO 
04 E9 00188 BLBC RO, 
1 DD 001 PUSHL # 
4 11 901 BRE 10$ 
eh 192 7$ BNEQ 8 
50 000000006 4 p } post ALINS_WARNISUE, RO 
50 00000000G 8F D0 0Ui9D as: MOVL #LINS_ERRORISUE, RO 
0 DD QO1A4 + PUSHL R 
00000000V_ EF 1 FB QO1A6 10$ CALLS #1, LNKSEXIT 
04 00O1AD RET 
0000 fs 11$ «WORD Save nothing 
7E 04 0018 CLRL -(SP) 
5E bp 01B2 PUSHL SP 
7E 04 as D 00184 MOVa 4(AP), =(SP) 
000000006 00 03 FB 001B8 CALLS #3, LNKSHANDLER 
04 001BF RET 


; Routine Size: 448 bytes, Routine Base: S$CODE$ + 0000 


Od td 8 at od oO 
DOBVAARWN=SSRVE 


; Routine Size: 


320 
; 321 


Name 
$GLOBAL$ 
SOUNS 
SCODES 


File 


$ep-1984 00:04:27 Ax-11 BLlis V4.0-74 
18-se0-1984 0 99:95:35 AtKeR SReLT act oor 
o6i7 } nates ROUTINE LNKSEXIT (EXITCODE) : NOVALUE= 
bc19 : LINKER TERMINATION RGUTINE 
0421 BEGIN 
4 ¢ IF .EXITCODE NEQ ap 
THEN BEGIN 
4 LNKSCLOSYMOUT (0); ' CLOSE ANY traek's TABLE OUTPUT 
0425 tNKSCLOSIMGE It L dd: ' CLOSE THE IMAGE FILE 
3s § ‘pecan IL 0); ' CLOSE THE MAP FILE 
4 6 
be g ; SEXIT (CODE = .EXITCODE OR STSSM_INHIB_MSG); 
0450 1 END; 
-EXTRN SYSS$SEXIT 
0000 00000 ENTRY LNKSEXIT, Save nothing 
01 04 AC D1 00002 CMPL EXITCODE. # #1 
17 13 00006 BEQL i 
7E 04 00008 CLRL -(SP) 
000000006 00 4 FB QOOOA CALLS #1, LNKSCLOSYMOUT 
00000000G 00 0 FB 00011 CALLS 40, ENKSCLOSIMGF IL 
000000006 00 CO FB 00018 CALL LNKSCLOSMAPF IL 
AC 10000000 8F C9 OO01F 18: BISL nebet 4334 56, EXITCODE, -(SP) 
000000006 00 01 FB 00028 CALLS Exit 
04 0002F RET 
48 bytes, Routine Base: S$CODE$ + 01¢0 
0431 1 
0432 0 END ELUDOM 
PSECT SUMMARY 
Bytes Attributes 
2 oven? WRT, RD ,NOEXE,NOSHR, LCL, REL, CON,NOPIC,ALIGN(2) 
VEC, WRT. RD ,NOEXE,NOSHR, LCL, REL, CON,NOPIC,ALIGN(2) 
496 NOVEC. *NOWRT. RD , EXE,NOSHR, LCL, REL, CON,NOPIC,ALIGN(2) 
Library Statistics 
wocecene Symbols eweecece Pages Processing 
Total Loaded Percent Mapped Time 


- eS rt 
e-om Cr 


, -8255S$DUA SYSLIBJLIB.L32;1 18619 17 10 :02. 
E mia E ER TAKER- O80 SDATBAS.U32:1 $33 4 8 38 00:00:8 
| 
| 
| 
3 COMMAND QUALIFIERS 
BLISS/CHECK=(FIELD, INITIAL, OPTIMIZE) /LIS=LIS$:LINKER/OBJ=OBJ$:LINKER MSRC$:LINKER/UPDATE=(ENH$:L 
: Size: 496 code + 144 data bytes 
3; Run Time: 0:12.3 
Elapsed Time 00:39.2 
Lines/CPU Min 110 


: Lexemes/CPU-Min: 15771 
ry Used: 149 pages 
: Compilation Complete 


YOE=88" WEStpc18 0:08:37 Wehbe 


ER’ 


INKER) 


MENT CORPORATION 
AND PROPRIETARY 


P 


DIGI 
VAX/VMS V4.0 __ CONF 


215 AH BT13A- SE 


0?1 AH-BT13A-SE NT CORPORATIO 
: VAX/VMS V4.0 D PROPRIETARY 


